'##############
'Řídící jednototka OIS
'##############

'Needs:
'- Cockpit (Batterietrennschalter)
'- Door (Haltestellenbremse)
'- 'JKZ

'Revision History:

'- Rüdiger Hülsmann		05.01.2011		File created based on IBIS.osc (last revision 05.01.2011)
'- Marcel Kuhnt			07.01.2011		Don't show busstops if no route	
'- Marcel Kuhnt			17.01.2011		9xx00 => 9xx04 instead of 9xx35!
'- Rüdiger Hülsmann		24.01.2011		Delay display on IBIS
'- Rüdiger Hülsmann		26.01.2011		IBIS blink bug fixed, "+/- 0 min" removed
'- Rüdiger Hülsmann		06.02.2011		Cabin-display init
'- Marcel Kuhnt			24.02.2011		Announcements from string act_busstop
'- Daniel94				17.07.2012		Projížďení zastávek na panelu BUSE
'- Marty515        		25.07.2012		Přidána diagnostika pro celý bus
'- Marty515        		01.08.2012		Upraveno pro CZ kasu
'- Marty515        		25.12.2012		Opraveno tl. enter
'- Daniel94				25.12.2012		Boční panel BUSE /přes zastávky/
'- Daniel94				30.07.2013		Kasa -> Boot, Login
'- Daniel94				03.08.2013		Oprava zadávání menu kasy
'- Daniel94				11.08.2013		"Další linkaspoj", odhlášení + oprava bugů
'- Marty515				17.09.2013		Korekce
'- Daniel94				22.05.2014		Stanicování + úprava hlášení
'- Daniel94				05.10.2014		Nový panel BUSE

'--------------------------------------------------------------------------------

'----------------------
'	Trigger
'----------------------

{trigger:IBIS_eingabe}

	(L.L.JKZ_mod) 2 =
	{if}
	0 (S.L.IBIS_busstop)
	(L.$.1cs) (L.$.2cs) $+ (L.$.3cs) $+ $StrToFloat (S.L.mpc_linka)
	(L.$.4cs) (L.$.5cs) $+ $StrToFloat (S.L.mpc_trasa)
	(L.$.6cs) (L.$.7cs) $+ $StrToFloat (S.L.jkz_den)
	
	(L.L.mpc_linka) 100 * (L.L.mpc_trasa) + (M.V.GetRouteIndex) (S.L.IBIS_RouteIndex)
	(M.V.GetRouteTerminusIndex) (S.L.IBIS_TerminusIndex)
	(L.L.mpc_linka) 100 * (L.L.mpc_trasa) + (S.L.IBIS_Linie_Complex)
'	(L.$.6cs) (L.$.7cs) $+ $StrToFloat (S.L.IBIS_Linie_Suffix)
	(L.$.mpc_klavesnice_txt) (S.$.mpc_sluzba_txt)
	
	1 (S.L.mpc_zadani_pozice) (S.L.JKZ_mod) (S.L.JKZ_platnost_JR)
					(M.L.IBIS_RefreshBusstop)
					(M.L.IBIS_RefreshTerminusText)
					(M.L.IBIS_LCD-refresh)
	(L.$.1cs) "9" $= (L.$.1cs) (L.$.2cs) $+ "07" $= || {if} {else} 0 (S.L.pbuse_visible) {endif}
	
	{endif}				

	(L.L.JKZ_mod) 3 =
		{if}
			(L.$.1cs) (L.$.2cs) $+ (L.$.3cs) $+ (L.$.4cs) $+ $StrToFloat (M.V.GetTerminusIndex) (S.L.IBIS_TerminusIndex)
		
			1 (S.L.mpc_zadani_pozice)		
			5 (S.L.JKZ_mod)
					(M.L.IBIS_RefreshBusstop)
					(M.L.IBIS_RefreshTerminusText)
					(M.L.IBIS_LCD-refresh)
			(L.$.1cs) "9" $= (L.$.1cs) (L.$.2cs) $+ "07" $= || {if} 1 (S.L.pbuse_visible) {else} 0 (S.L.pbuse_visible) {endif}
		{endif}	
	
		
	
	(L.L.JKZ_mod) 4 =
		{if}
			3 (S.L.JKZ_mod)
		{endif}	
		
	(L.L.JKZ_mod) 7 =
	(L.L.JKZ_mod) 8 = ||
	(L.L.JKZ_mod) 9 = ||
	(L.L.JKZ_mod) 30 = ||
	(L.L.CAS_promena) 1 = &&
		{if}
			1 (S.L.JKZ_mod)
		{endif}	
		
	(L.L.JKZ_mod) 7 =
	(L.L.JKZ_mod) 8 = ||
	(L.L.JKZ_mod) 9 = ||
	(L.L.JKZ_mod) 30 = ||
	(L.L.CAS_promena) 2 = &&
		{if}
			6 (S.L.JKZ_mod)
		{endif}	
		
	
	(L.L.budik_aktivni) 1 = {if} 0 (S.L.budik_aktivni) {endif}
	
	(T.L.ev_IBIS_piep)
	
	(L.L.JKZ_mod) 20 =
	(L.L.CAS_promena) 1 = &&
		{if}
		(M.L.JKZ_hlaseni_vyhlasit)
		1 (S.L.JKZ_mod)
		{endif}	
		
	(L.L.JKZ_mod) 20 =
	(L.L.CAS_promena) 2 = &&
		{if}
		(M.L.JKZ_hlaseni_vyhlasit)
		6 (S.L.JKZ_mod)
		{endif}

	
{end}

{trigger:IBIS_1}
	"1" (S.$.JKZ_Promena)
	(M.L.MPC_zadani)
	
	(L.L.JKZ_mod) 1 =
	(L.L.JKZ_mod) 6 = ||
	{if}
		8 (S.L.JKZ_mod) 	
	{endif}

	(T.L.ev_IBIS_piep)
{end}

{trigger:IBIS_2}
	"2" (S.$.JKZ_Promena)
	(M.L.MPC_zadani)

	(L.L.JKZ_mod) 1 =
	(L.L.JKZ_mod) 6 = ||
	{if}
		(L.L.JKZ_mod) 1 =
		{if}
			6 (S.L.JKZ_mod)
		{else}
			1 (S.L.JKZ_mod)
		{endif}
	{endif}

	(T.L.ev_IBIS_piep)
{end}

{trigger:IBIS_3}
	"3" (S.$.JKZ_Promena)
	(M.L.MPC_zadani)
	
	(L.L.JKZ_mod) 1 =
	(L.L.JKZ_mod) 5 = ||
	(L.L.JKZ_mod) 6 = ||
	{if}
		4 (S.L.JKZ_mod) 
		"0" (S.$.1cs) (S.$.2cs) (S.$.3cs) (S.$.4cs)
		(L.$.1cs) (L.$.2cs) $+ (L.$.3cs) $+ (L.$.4cs) $+ (S.$.mpc_klavesnice_txt)	
	{endif}
	
	(T.L.ev_IBIS_piep)
{end}

{trigger:IBIS_4}
	"4" (S.$.JKZ_Promena)
	(M.L.MPC_zadani)
	
	(T.L.ev_IBIS_piep)
{end}

{trigger:IBIS_5}
	"5" (S.$.JKZ_Promena)
	(M.L.MPC_zadani)
	
	(L.L.JKZ_mod) 1 =
	(L.L.JKZ_mod) 5 = ||
	(L.L.JKZ_mod) 6 = ||
	{if}
		2 (S.L.JKZ_mod) 
		(L.$.mpc_klavesnice_txt) $length 9 <
		{if}
			(L.$.tmp_sl1) (S.$.1cs) (L.$.tmp_sl2) (S.$.2cs) $+ (L.$.tmp_sl3) (S.$.3cs) $+ (L.$.tmp_sl4) (S.$.4cs) $+ (L.$.tmp_sl5) (S.$.5cs) $+ (L.$.tmp_sl6) (S.$.6cs) $+ (L.$.tmp_sl7) (S.$.7cs) $+ (S.$.mpc_klavesnice_txt)
		{endif}
	{endif}
	
	(T.L.ev_IBIS_piep)
{end}

{trigger:IBIS_6}
	"6" (S.$.JKZ_Promena)
	(M.L.MPC_zadani)
	
	(L.L.JKZ_mod) 1 =
	(L.L.JKZ_mod) 5 = ||
	(L.L.JKZ_mod) 6 = ||
	{if}
		7 (S.L.JKZ_mod)
	{endif}
		
	(T.L.ev_IBIS_piep)
{end}

{trigger:IBIS_7}
	"7" (S.$.JKZ_Promena)
	(M.L.MPC_zadani)
	
	(T.L.ev_IBIS_piep)
{end}

{trigger:IBIS_8}
	"8" (S.$.JKZ_Promena)
	(M.L.MPC_zadani)
	
	(T.L.ev_IBIS_piep)
{end}

{trigger:IBIS_9}
	"9" (S.$.JKZ_Promena)
	(M.L.MPC_zadani)
	
	(L.L.JKZ_mod) 1 =
	(L.L.JKZ_mod) 5 = ||
	(L.L.JKZ_mod) 6 = ||
	{if}
		30 (S.L.JKZ_mod)
	{endif}
	
	
	(T.L.ev_IBIS_piep)
{end}

{trigger:IBIS_0}
	"0" (S.$.JKZ_Promena)
	(M.L.MPC_zadani)
	
	(L.L.JKZ_mod) 1 =
	(L.L.JKZ_mod) 6 = ||
	{if}
		(L.L.st_aktiv) 1 + (S.L.st_aktiv)
		(L.L.st_aktiv) 1 = {if} 1 (S.L.hlaseni) 
								(L.$.act_busstop) (S.$.zastavka_vyhlaseni) {endif}
		(L.L.st_aktiv) 3 = {if} 0 (S.L.st_aktiv) {endif}
		(L.L.st_aktiv) 1.5 = {if} 2 (S.L.st_aktiv) {endif}
	{endif}
	
	(T.L.ev_IBIS_piep)
{end}

{trigger:IBIS_loeschen}
	

	(L.L.elec_busbar_main)
	{if}
		0 (S.L.IBIS_mode)
		
	{endif}
	
		(L.L.JKZ_mod) 2 = {if} 
		"0" (S.$.1cs) (S.$.2cs) (S.$.3cs) (S.$.4cs) (S.$.5cs) (S.$.6cs) (S.$.7cs)
		(L.$.1cs) (L.$.2cs) $+ (L.$.3cs) $+ (L.$.4cs) $+ (L.$.5cs) $+ (L.$.6cs) $+ (L.$.7cs) $+ (S.$.mpc_klavesnice_txt)
		1 (S.L.mpc_zadani_pozice) {endif}
		
		(L.L.JKZ_mod) 3 = {if}
		"0" (S.$.1cs) (S.$.2cs) (S.$.3cs) (S.$.4cs)
		(L.$.1cs) (L.$.2cs) $+ (L.$.3cs) $+ (L.$.4cs) $+ (S.$.mpc_klavesnice_txt)
		1 (S.L.mpc_zadani_pozice) {endif}
		
	
	(L.L.JKZ_mod) 7 =
	(L.L.JKZ_mod) 8 = ||
	(L.L.JKZ_mod) 9 = ||
	(L.L.JKZ_mod) 2 = ||
	(L.L.JKZ_mod) 3 = ||
	(L.L.JKZ_mod) 4 = ||
	(L.L.JKZ_mod) 5 = ||
	(L.L.JKZ_mod) 10 = ||
	(L.L.JKZ_mod) 11 = ||
	(L.L.JKZ_mod) 20 = ||
	(L.L.JKZ_mod) 30 = ||
	(L.L.CAS_promena) 1 = &&
		{if}
			1 (S.L.JKZ_mod)
		{endif}	
		
	(L.L.JKZ_mod) 7 =
	(L.L.JKZ_mod) 8 = ||
	(L.L.JKZ_mod) 9 = ||
	(L.L.JKZ_mod) 2 = ||
	(L.L.JKZ_mod) 3 = ||
	(L.L.JKZ_mod) 4 = ||
	(L.L.JKZ_mod) 5 = ||
	(L.L.JKZ_mod) 10 = ||
	(L.L.JKZ_mod) 11 = ||
	(L.L.JKZ_mod) 20 = ||
	(L.L.JKZ_mod) 30 = ||
	(L.L.CAS_promena) 2 = &&
		{if}
			6 (S.L.JKZ_mod)
		{endif}
		
	(T.L.ev_IBIS_piep)
{end}

{trigger:IBIS_vor}

	
	(L.L.elec_busbar_main) (L.L.IBIS_mode) s0 0 = l0 8 = || &&
	{if}
		(L.L.IBIS_busstop) 1 + (S.L.IBIS_busstop)
		(M.L.IBIS_RefreshBusstop)
		(M.L.IBIS_PlayAnnouncement)
		(T.L.ev_IBIS_piep)
'		Nullsetzen des Timers für den Zeilenwechsel der LCD-Innenanzeige
		0 (S.L.IBIS_LCD-zeilentimer) (S.L.IBIS_LCD-zeile)
		(M.L.IBIS_LCD-refresh)
	{endif}
	(T.L.ev_IBIS_piep)
{end}

{trigger:IBIS_vor_stumm}

	(L.L.JKZ_mod) 7 =
	{if}
		(L.L.elec_busbar_main) (L.L.IBIS_mode) s0 0 = l0 8 = || &&
		{if}
			(L.L.IBIS_busstop) 1 + (S.L.IBIS_busstop)
			(M.L.IBIS_RefreshBusstop)
			(T.L.ev_IBIS_piep)
'			Nullsetzen des Timers für den Zeilenwechsel der LCD-Innenanzeige
			0 (S.L.IBIS_LCD-zeilentimer) (S.L.IBIS_LCD-zeile)
			(M.L.IBIS_LCD-refresh)
		{endif}
	{endif}
	
	(T.L.ev_IBIS_piep)
	
		(L.L.JKZ_mod) 20 =
{if}
		(L.$.JKZ_Cislo_hlaseni) "49" $= {if} "50" (S.$.JKZ_Cislo_hlaseni) {endif}
		(L.$.JKZ_Cislo_hlaseni) "35" $= {if} "49" (S.$.JKZ_Cislo_hlaseni) {endif}
		(L.$.JKZ_Cislo_hlaseni) "34" $= {if} "35" (S.$.JKZ_Cislo_hlaseni) {endif}
		(L.$.JKZ_Cislo_hlaseni) "33" $= {if} "34" (S.$.JKZ_Cislo_hlaseni) {endif}
		(L.$.JKZ_Cislo_hlaseni) "32" $= {if} "33" (S.$.JKZ_Cislo_hlaseni) {endif}
		(L.$.JKZ_Cislo_hlaseni) "31" $= {if} "32" (S.$.JKZ_Cislo_hlaseni) {endif}
		(L.$.JKZ_Cislo_hlaseni) "30" $= {if} "31" (S.$.JKZ_Cislo_hlaseni) {endif}
		(L.$.JKZ_Cislo_hlaseni) "20" $= {if} "30" (S.$.JKZ_Cislo_hlaseni) {endif}
		(L.$.JKZ_Cislo_hlaseni) "14" $= {if} "20" (S.$.JKZ_Cislo_hlaseni) {endif}
		(L.$.JKZ_Cislo_hlaseni) "13" $= {if} "14" (S.$.JKZ_Cislo_hlaseni) {endif}
		(L.$.JKZ_Cislo_hlaseni) "12" $= {if} "13" (S.$.JKZ_Cislo_hlaseni) {endif}
		(L.$.JKZ_Cislo_hlaseni) "11" $= {if} "12" (S.$.JKZ_Cislo_hlaseni) {endif}
		(L.$.JKZ_Cislo_hlaseni) "10" $= {if} "11" (S.$.JKZ_Cislo_hlaseni) {endif}
		(L.$.JKZ_Cislo_hlaseni) "03" $= {if} "10" (S.$.JKZ_Cislo_hlaseni) {endif}
		(L.$.JKZ_Cislo_hlaseni) "02" $= {if} "03" (S.$.JKZ_Cislo_hlaseni) {endif}
		(L.$.JKZ_Cislo_hlaseni) "01" $= {if} "02" (S.$.JKZ_Cislo_hlaseni) {endif}
		(L.$.JKZ_Cislo_hlaseni) "00" $= {if} "01" (S.$.JKZ_Cislo_hlaseni) {endif}
		(M.L.sluzebni_hlaseni)
	{endif}
	
	(L.L.JKZ_mod) 30 =
	{if}
		(L.$.HLASENI_HLASITOST) "1" $= {if} "2" (S.$.HLASENI_HLASITOST) {endif}
		(L.$.HLASENI_HLASITOST) "0" $= {if} "1" (S.$.HLASENI_HLASITOST) {endif}
	{endif}
	
		(L.L.JKZ_mod) 2 =
		(L.L.JKZ_mod) 3 = ||
		(L.L.JKZ_mod) 9 = ||
	{if}
	(L.L.mpc_zadani_pozice) 1 + (S.L.mpc_zadani_pozice)
	(L.L.JKZ_mod) 8 = {if} 9 (S.L.JKZ_mod) 1 (S.L.mpc_zadani_pozice) {endif}
	(L.L.JKZ_mod) 2 = {if} (L.L.mpc_zadani_pozice) 7 > {if} 7 (S.L.mpc_zadani_pozice) {endif} {endif}
	(L.L.JKZ_mod) 3 = (L.L.JKZ_mod) 9 = || {if} (L.L.mpc_zadani_pozice) 4 > {if} 4 (S.L.mpc_zadani_pozice) {endif} {endif}
	{endif}
	
{end}

{trigger:IBIS_rueck}

	(L.L.JKZ_mod) 7 =
	{if}
	
	(L.L.elec_busbar_main) (L.L.IBIS_mode) s0 0 = l0 8 = || &&
	{if}
		(L.L.IBIS_busstop) 0 > &&
		{if}
			(L.L.IBIS_busstop) 1 - (S.L.IBIS_busstop)
			(M.L.IBIS_RefreshBusstop)
'			Nullsetzen des Timers für den Zeilenwechsel der LCD-Innenanzeige
			0 (S.L.IBIS_LCD-zeilentimer) (S.L.IBIS_LCD-zeile)
			(M.L.IBIS_LCD-refresh)
		{endif}
		(T.L.ev_IBIS_piep)

	{endif}
	{endif}
	
	(T.L.ev_IBIS_piep)
	
	(L.L.JKZ_mod) 20 =
	{if}
		(L.$.JKZ_Cislo_hlaseni) "01" $= {if} "00" (S.$.JKZ_Cislo_hlaseni) {endif}
		(L.$.JKZ_Cislo_hlaseni) "02" $= {if} "01" (S.$.JKZ_Cislo_hlaseni) {endif}
		(L.$.JKZ_Cislo_hlaseni) "03" $= {if} "02" (S.$.JKZ_Cislo_hlaseni) {endif}
		(L.$.JKZ_Cislo_hlaseni) "10" $= {if} "03" (S.$.JKZ_Cislo_hlaseni) {endif}
		(L.$.JKZ_Cislo_hlaseni) "11" $= {if} "10" (S.$.JKZ_Cislo_hlaseni) {endif}
		(L.$.JKZ_Cislo_hlaseni) "12" $= {if} "11" (S.$.JKZ_Cislo_hlaseni) {endif}
		(L.$.JKZ_Cislo_hlaseni) "13" $= {if} "12" (S.$.JKZ_Cislo_hlaseni) {endif}
		(L.$.JKZ_Cislo_hlaseni) "14" $= {if} "13" (S.$.JKZ_Cislo_hlaseni) {endif}
		(L.$.JKZ_Cislo_hlaseni) "20" $= {if} "14" (S.$.JKZ_Cislo_hlaseni) {endif}
		(L.$.JKZ_Cislo_hlaseni) "30" $= {if} "20" (S.$.JKZ_Cislo_hlaseni) {endif}
		(L.$.JKZ_Cislo_hlaseni) "31" $= {if} "30" (S.$.JKZ_Cislo_hlaseni) {endif}
		(L.$.JKZ_Cislo_hlaseni) "32" $= {if} "31" (S.$.JKZ_Cislo_hlaseni) {endif}
		(L.$.JKZ_Cislo_hlaseni) "33" $= {if} "32" (S.$.JKZ_Cislo_hlaseni) {endif}
		(L.$.JKZ_Cislo_hlaseni) "34" $= {if} "33" (S.$.JKZ_Cislo_hlaseni) {endif}
		(L.$.JKZ_Cislo_hlaseni) "35" $= {if} "34" (S.$.JKZ_Cislo_hlaseni) {endif}
		(L.$.JKZ_Cislo_hlaseni) "49" $= {if} "35" (S.$.JKZ_Cislo_hlaseni) {endif}
		(L.$.JKZ_Cislo_hlaseni) "50" $= {if} "49" (S.$.JKZ_Cislo_hlaseni) {endif}
		(M.L.sluzebni_hlaseni)
	{endif}
	
	(L.L.JKZ_mod) 30 =
	{if}
		(L.$.HLASENI_HLASITOST) "1" $= {if} "0" (S.$.HLASENI_HLASITOST) {endif}
		(L.$.HLASENI_HLASITOST) "2" $= {if} "1" (S.$.HLASENI_HLASITOST) {endif}
		
	{endif}
	
	(L.L.JKZ_mod) 2 =
	(L.L.JKZ_mod) 3 = ||
	(L.L.JKZ_mod) 9 = ||
	{if}
	(L.L.mpc_zadani_pozice) 1 - (S.L.mpc_zadani_pozice)
	(L.L.JKZ_mod) 9 = {if} (L.L.mpc_zadani_pozice) 0 = {if} 8 (S.L.JKZ_mod) {endif} {endif}
	(L.L.mpc_zadani_pozice) 1 < {if} 1 (S.L.mpc_zadani_pozice) {endif}
	{endif}
{end}


'----------------------
'	Init
'----------------------

{macro:IBIS_init}
	"     " (S.$.IBIS_Complex_Line)
	-1 (S.L.IBIS_RouteIndex)
	-1 (S.L.bs120_mod)
	(M.L.pres_zastavky)
{end}


'----------------------
'	Frame
'----------------------

{macro:IBIS_frame}
	(L.L.st_aktiv) 1 =
	{if}
		(L.L.st_cas) (L.S.Timegap) + (S.L.st_cas)
		(L.L.st_cas) 20 >
		{if}
			2 (S.L.st_aktiv)
		{endif}
		
		(L.L.door_0) 0.1 > (L.L.door_2) 0.1 > || (L.L.door_4) 0.1 > ||
		{if}
			0 (S.L.st_cas)
			1.5 (S.L.st_aktiv)
		{endif}
	{endif}
	
	(L.L.st_aktiv) 1.5 =
	{if}
		(L.L.door_0) 0 = (L.L.door_2) 0 = && (L.L.door_4) 0 = &&
		{if}
			(L.L.IBIS_busstop) 1 + (S.L.IBIS_busstop)
			(M.L.IBIS_RefreshBusstop)
			0 (S.L.IBIS_LCD-zeilentimer) (S.L.IBIS_LCD-zeile)
			(M.L.IBIS_LCD-refresh)
			0 (S.L.st_cas) (S.L.st_aktiv)
						
				(L.L.MPC_zastavka_odchylka) +5 >
				(L.L.schedule_active) &&
			{if}
				(T.L.MPC_predcasny_odjezd)
			{endif}
			
	
		{endif}
	{endif}
	
	(L.L.st_aktiv) 2 >=
	{if}
		(L.L.IBIS_busstop) 1 + (S.L.IBIS_busstop)
		(M.L.IBIS_RefreshBusstop)
		0 (S.L.IBIS_LCD-zeilentimer) (S.L.IBIS_LCD-zeile)
		(M.L.IBIS_LCD-refresh)
		0 (S.L.st_cas) (S.L.st_aktiv)
		
				(L.L.MPC_zastavka_odchylka) +5 >
				(L.L.schedule_active) &&
			{if}
				(T.L.MPC_predcasny_odjezd)
			{endif}
			
	{endif}

	(L.L.hlaseni) 1 =
	{if}
		(L.L.hlaseni_cas) (L.S.Timegap) + (S.L.hlaseni_cas)
		(L.L.hlaseni_cas) 3 >
		{if}
			(M.L.IBIS_PlayAnnouncement)
			0 (S.L.hlaseni_cas) (S.L.hlaseni)
	
		{endif}
	{endif}
	
	
	

		


	(L.L.elec_busbar_main)
	{if}

'----------------
'Anfangsmelodie
		(L.L.IBIS_energy_last) !
		{if}
			(T.L.ev_IBIS-startupsound)
			1 (S.L.diagnostika_sw) (S.L.diagnostika_sw2) (S.L.diagnostika_sw3) (S.L.diagnostika_sw4) (S.L.JKZ_start) (S.L.bs120_start)
			0 (S.L.IBIS_mode)

		{endif}





'----------------
'Entwerter-Weiterschaltung:
		(L.L.IBIS_busstop_entwerter_ist) (L.L.IBIS_busstop_entwerter_soll) = ! (L.L.bremse_halte) &&
		{if}
			(L.L.IBIS_busstop_entwerter_soll) (S.L.IBIS_busstop_entwerter_ist)
			(T.L.ev_IBIS_entwerter_weiter)
		{endif}




		
'Linie/Kurs:
		(L.$.IBIS_Complex_Line) $+ " " $+
'Route:
		(L.L.IBIS_Route) "02" $IntToStrEnh $+ " " $+
'Terminus:
		(L.L.IBIS_TerminusCode) "03" $IntToStrEnh $+
		" " $+
'Zone / Entwerter:
		(L.L.IBIS_busstop_entwerter_ist) " 4" $IntToStrEnh $+ " " $+

		(L.L.IBIS_Route) 2 % 0.5 >
		{if}
			"A" $+
		{else}
			"B" $+
		{endif}
		" " $+
	{else}
		"" (S.$.IBIS) (S.$.IBIS_cabindisplay)
	{endif}

	(S.$.IBIS)





	

'Omsi sagen, dass die Strings-Ausgaben aktualisiert werden sollen:
	1 (S.L.Refresh_Strings)


'----------------
'Microphon-Taster:
	(L.L.Snd_Microphone) (L.L.IBIS_LastMicro) ! && 
	{if}
		(L.L.IBIS_busstop) 1 + (S.L.IBIS_busstop)
		(M.L.IBIS_RefreshBusstop)
		(M.L.IBIS_PlayAnnouncement)

'		Nullsetzen des Timers für den Zeilenwechsel der LCD-Innenanzeige
		0 (S.L.IBIS_LCD-zeilentimer) (S.L.IBIS_LCD-zeile)
		(M.L.IBIS_LCD-refresh)
	{endif}
	(L.L.Snd_Microphone) (S.L.IBIS_LastMicro)

'----------------
'Last energy:
	(L.L.elec_busbar_main) (S.L.IBIS_energy_last)

'----------------
'LCD-Anzeigetimer hochlaufen lassen
	(L.L.IBIS_LCD-zeilentimer) (L.S.Timegap) + (S.L.IBIS_LCD-zeilentimer)
	4 >
	(L.L.elec_busbar_main) &&
	{if}
		(L.L.IBIS_LCD-zeile) ! (S.L.IBIS_LCD-zeile)
		0 (S.L.IBIS_LCD-zeilentimer)
		(M.L.IBIS_LCD-refresh)
	{endif}





{end}

'----------------------
'	Macros
'----------------------

{macro:IBIS_RefreshBusstop}

(M.L.IBIS_RefreshTerminusText)

	(L.L.IBIS_RouteIndex) 0 <
	{if}
		"" (S.$.act_busstop)
	{else}
	(L.L.IBIS_RouteIndex) (M.V.GetBusstopCount) (L.L.IBIS_busstop) <=
	{if}
'Wenn der Bushaltestellenindex größer oder gleich der Anzahl ist und somit zu groß (der Bushaltestellenindex ist wie alle Indizes nullbasiert), 
'dann wechsele automatisch auf die Gegenroute, sofern der Index 01 oder 02 ist und der jeweilige andere Index existiert. Sonst belasse die Route.
		0 (S.L.IBIS_busstop)
' Entwerter umstellen:
		(T.L.ev_IBIS_entwerter)
		(L.L.IBIS_busstop_entwerter_soll) (S.L.IBIS_busstop_entwerter_ist)

			(L.L.MPC_trasa)
			2 % 0.5 >
			{if}
				(L.L.MPC_trasa) 1 + (S.L.MPC_trasa)
			{else}
				(L.L.MPC_trasa) 1 - (S.L.MPC_trasa)
			{endif}
			
		(L.L.mpc_linka) 100 * (L.L.MPC_trasa) + (M.V.GetRouteIndex) (S.L.IBIS_RouteIndex)
		(M.V.GetRouteTerminusIndex) (S.L.IBIS_TerminusIndex)
		(L.L.mpc_linka) 100 * (L.L.MPC_trasa) + (S.L.IBIS_Linie_Complex)

		
		(M.L.IBIS_RefreshTerminusText)
'Suche den Routeindex:

		(L.L.IBIS_LinieKurs) 100 * l6 + (M.V.GetRouteIndex) s1
		0 >=
		{if}
'Wenn gültig, dann wechsele:

			l6 (S.L.IBIS_Route)
		{endif}
	{else}
		0 (S.L.IBIS_mode)
	{endif}
	{endif}

'Setzen der String-Variable "act_busstop" für die OMSI-interne Berechnung und daraus Ableitung des "globalen" Haltestellenindexes:

	(L.L.IBIS_RouteIndex) (L.L.IBIS_busstop) (M.V.GetRouteBusstopIdent) (S.$.act_busstop)
	(M.V.GetBusstopIndex) (S.L.IBIS_busstop_index)


'Ausrechnen der neuen Entwerterposition:
	(L.L.IBIS_busstop_offset) (L.L.IBIS_busstop) + (S.L.IBIS_busstop_entwerter_soll)


{end}

{macro:IBIS_PlayAnnouncement}
	(L.$.HLASENI_HLASITOST) "1" $=
	{if}
	
		(L.L.IBIS_busstop) -1 >
		{if}
         "..\..\Announcements\" 0 (M.V.GetDepotStringGlobal) "\" $+ $+ (L.$.act_busstop) $+ $msg

         (L.L.IBIS_RouteIndex) (M.V.GetBusstopCount) 1 - (L.L.IBIS_busstop) <=

         ".wav" $+
         $msg
         (T.F.ev_IBIS_Ansagen)
         (T.F.Hlasic_NOC)         
      {endif}
   {endif}
	
	(L.$.HLASENI_HLASITOST) "2" $=
	{if}
	
		(L.L.IBIS_busstop) -1 >
		{if}
         "..\..\Announcements\" 0 (M.V.GetDepotStringGlobal) "\" $+ $+ (L.$.act_busstop) $+ $msg

         (L.L.IBIS_RouteIndex) (M.V.GetBusstopCount) 1 - (L.L.IBIS_busstop) <=

         ".wav" $+
         $msg
         (T.F.ev_IBIS_Ansagen)
         (T.F.Hlasic_DEN)         
      {endif}
   {endif}
   
{end}

{macro:IBIS_LCD-refresh}	
	(L.L.mpc_linka) 0 =
	{if}
		"" (S.$.IBIS_lcd_line) (S.$.IBIS_lcd_dest1)  
		"MANIPULAčNí JíZDA" (S.$.IBIS_lcd_dest)
		"" (S.$.IBIS_lcd_nextstop) (S.$.IBIS_lcd_stop1) (S.$.IBIS_lcd_stop2) (S.$.IBIS_lcd_stop3) (S.$.IBIS_lcd_stop4) (S.$.IBIS_lcd_stop5) (S.$.IBIS_lcd_stop6) (S.$.IBIS_lcd_stop7) (S.$.IBIS_lcd_stop8)
		"" (S.$.BS120_Disp_A) (S.$.BS120_Disp_B) (S.$.pres_zastavky)
		"" (S.$.JKZ_pasmo) 
			
	{else}

		(L.$.Matrix_Nr) (S.$.IBIS_lcd_line) 
		(L.$.IBIS_terminus_name) 20 $SetLengthL (S.$.IBIS_lcd_dest) 
		(L.$.IBIS_terminus_name) (S.$.IBIS_lcd_dest1) 
		(L.$.IBIS_terminus_name) 12 $SetLengthL (S.$.IBIS_lcd_dest2a) 
		(L.L.IBIS_busstop_index) 3 (M.V.GetBusstopString) 10 $SetLengthL (S.$.JKZ_DS) 
		(L.L.IBIS_busstop_index) 3 (M.V.GetBusstopString) 11 $SetLengthL (S.$.JKZ_DS2) 
		(L.L.IBIS_busstop_index) 2 (M.V.GetBusstopString) 2 $SetLengthL (S.$.JKZ_pasmo) 
		(L.L.IBIS_busstop_index) 4 (M.V.GetBusstopString) 2 $SetLengthL (S.$.JKZ_priznak)
		(L.L.IBIS_busstop_index) 1 (M.V.GetBusstopString) (S.$.IBIS_lcd_nextstop) 
		
		
		(L.L.IBIS_RouteIndex) (M.V.GetBusstopCount) 1 - (L.L.IBIS_busstop) 1 + >=
		{if}
			(L.L.IBIS_RouteIndex) (L.L.IBIS_busstop) 1 + (M.V.GetRouteBusstopIdent)
			(M.V.GetBusstopIndex) 1 (M.V.GetBusstopString) (S.$.IBIS_lcd_stop1)
		{else}
			"" (S.$.IBIS_lcd_stop1)
		{endif}
		
		(L.L.IBIS_RouteIndex) (M.V.GetBusstopCount) 1 - (L.L.IBIS_busstop) 2 + >=
		{if}
			(L.L.IBIS_RouteIndex) (L.L.IBIS_busstop) 2 + (M.V.GetRouteBusstopIdent)
			(M.V.GetBusstopIndex) 1 (M.V.GetBusstopString) (S.$.IBIS_lcd_stop2)
		{else}
			"" (S.$.IBIS_lcd_stop2)
		{endif}
		(L.L.IBIS_RouteIndex) (M.V.GetBusstopCount) 1 - (L.L.IBIS_busstop) 3 + >=
		{if}
			(L.L.IBIS_RouteIndex) (L.L.IBIS_busstop) 3 + (M.V.GetRouteBusstopIdent)
			(M.V.GetBusstopIndex) 1 (M.V.GetBusstopString) (S.$.IBIS_lcd_stop3)
		{else}
			"" (S.$.IBIS_lcd_stop3)
		{endif}
		
		(L.L.IBIS_RouteIndex) (M.V.GetBusstopCount) 1 - (L.L.IBIS_busstop) 4 + >=
		{if}
			(L.L.IBIS_RouteIndex) (L.L.IBIS_busstop)  4 + (M.V.GetRouteBusstopIdent)
			(M.V.GetBusstopIndex) 1 (M.V.GetBusstopString) (S.$.IBIS_lcd_stop4)
		{else}
			"" (S.$.IBIS_lcd_stop4)
		{endif}

		(L.L.IBIS_RouteIndex) (M.V.GetBusstopCount) 1 - (L.L.IBIS_busstop) 5 + >=
		{if}
			(L.L.IBIS_RouteIndex) (L.L.IBIS_busstop)  5 + (M.V.GetRouteBusstopIdent)
			(M.V.GetBusstopIndex) 1 (M.V.GetBusstopString) (S.$.IBIS_lcd_stop5)
		{else}
			"" (S.$.IBIS_lcd_stop5)
		{endif}

		(L.L.IBIS_RouteIndex) (M.V.GetBusstopCount) 1 - (L.L.IBIS_busstop) 6 + >=
		{if}
			(L.L.IBIS_RouteIndex) (L.L.IBIS_busstop)  6 + (M.V.GetRouteBusstopIdent)
			(M.V.GetBusstopIndex) 1 (M.V.GetBusstopString) (S.$.IBIS_lcd_stop6)
		{else}
			"" (S.$.IBIS_lcd_stop6)
		{endif}

		(L.L.IBIS_RouteIndex) (M.V.GetBusstopCount) 1 - (L.L.IBIS_busstop) 7 + >=
		{if}
			(L.L.IBIS_RouteIndex) (L.L.IBIS_busstop)  7 + (M.V.GetRouteBusstopIdent)
			(M.V.GetBusstopIndex) 1 (M.V.GetBusstopString) (S.$.IBIS_lcd_stop7)
		{else}
			"" (S.$.IBIS_lcd_stop7)
		{endif}

		(L.L.IBIS_RouteIndex) (M.V.GetBusstopCount) 1 - (L.L.IBIS_busstop) 8 + >=
		{if}
			(L.L.IBIS_RouteIndex) (L.L.IBIS_busstop)  8 + (M.V.GetRouteBusstopIdent)
			(M.V.GetBusstopIndex) 1 (M.V.GetBusstopString) (S.$.IBIS_lcd_stop8)
		{else}
			"" (S.$.IBIS_lcd_stop8)
		{endif}
		
		(L.L.IBIS_RouteIndex) 0 (M.V.GetRouteBusstopIdent) (M.V.GetBusstopIndex) 1 (M.V.GetBusstopString) 29 $SetLengthL (S.$.IBIS_lcd_start)

	{endif}
	
		
{end}

{macro:pres_zastavky}


'BS120-----------------------
	(L.L.JKZ_start) 1 =
	{if}
		(L.L.mpc_linka) 1 >= &&
		{if}
			1 (S.L.Linka_visible)
			(L.L.bs120_mod) 0 =
			{if}
				"Richtung     " "@" $+ "" $+ (S.$.BS120_Disp_A)
				"" "@" $+ (L.$.IBIS_lcd_dest) $+ (S.$.BS120_Disp_B)
				
				(L.L.bs120_casovac) (L.S.Timegap) + (S.L.bs120_casovac)
				(L.L.bs120_casovac) 3 >=
				{if}
					(L.$.IBIS_lcd_stop1) "" $=
					{if}
						2 (S.L.bs120_mod)
					{else}
						1 (S.L.bs120_mod)
					{endif}
					0 (S.L.bs120_casovac)
				{endif}
				(L.L.bs120_stanicovani) 1 = (L.L.bs120_casovac) 0.1 > && 
				{if} 
					2 (S.L.bs120_mod) 
					0 (S.L.bs120_stanicovani) 
				{endif}
			{endif}
			
			(L.L.bs120_mod) 1 =
			{if}
				"Über:" "@" $+ "" $+ (S.$.BS120_Disp_A)
				"" "@" $+ "" $+ (S.$.BS120_Disp_B)
				
				(L.$.IBIS_lcd_stop1)
				(L.$.IBIS_lcd_stop2) "" $= ! {if} " - " $+ (L.$.IBIS_lcd_stop2) $+ {endif}
				(L.$.IBIS_lcd_stop3) "" $= ! {if} " - " $+ (L.$.IBIS_lcd_stop3) $+ {endif}
				(L.$.IBIS_lcd_stop4) "" $= ! {if} " - " $+ (L.$.IBIS_lcd_stop4) $+ {endif}
				(S.$.pres_zastavky) "  " $+ $length 0.1 * 2 + (S.L.bs120_animace_cas)
'				(L.L.bs120_animace_cas) 2 + (S.L.bs120_animace_cas)
				5.5 < {if} 5.5 (S.L.bs120_animace_cas) {endif}
				
				0 (S.L.bs120_animace_vis)
				
				(L.L.bs120_casovac) (L.S.Timegap) + (S.L.bs120_casovac) (S.L.bs120_animace)
				(L.L.bs120_casovac) (L.L.bs120_animace_cas) >=
				{if}
					2 (S.L.bs120_mod)
					0 (S.L.bs120_casovac)
					0 (S.L.bs120_animace) 
					1 (S.L.bs120_animace_vis)
				{endif}
			{endif}
			
			(L.L.bs120_mod) 2 =
			{if}
				(L.$.JKZ_priznak) "ZZ" $=
				{if}
					"Nächste haltestelle" "@" $+ "" $+ (S.$.BS120_Disp_A)
					"" "@" $+ "" $+ (S.$.BS120_Disp_B)
					(L.$.IBIS_lcd_nextstop) " - Bedarfhaltestelle/Request stop" $+ (S.$.pres_zastavky)
					5.5 (S.L.bs120_animace_cas)
					0 (S.L.bs120_animace_vis)
					(L.L.bs120_casovac) (L.S.Timegap) + (S.L.bs120_casovac) (S.L.bs120_animace)
					(L.L.bs120_casovac) (L.L.bs120_animace_cas) >=
					{if}
						0 (S.L.bs120_mod)
						0 (S.L.bs120_casovac)
						0 (S.L.bs120_animace) 
						1 (S.L.bs120_animace_vis)
					{endif}
				{else}
					"Nächste haltestelle" "@" $+ "" $+ (S.$.BS120_Disp_A)
					"" "@" $+ (L.$.IBIS_lcd_nextstop) $+ (S.$.BS120_Disp_B)
					
					(L.L.bs120_casovac) (L.S.Timegap) + (S.L.bs120_casovac)
					(L.L.bs120_casovac) 3 >=
					{if}
						0 (S.L.bs120_mod)
						0 (S.L.bs120_casovac)
					{endif}
				{endif}
			{endif}
			
			(L.L.st_aktiv) 0 = !
			{if}
				1 (S.L.bs120_animace_vis)
				(L.$.IBIS_lcd_stop1) "" $=
				{if}
					"Endhaltestelle," "@" $+ "Bitte aussteigen" $+ (S.$.BS120_Disp_A)
					"" "@" $+ "" $+ (S.$.BS120_Disp_B)
				{else}
					0 (S.L.bs120_mod) (S.L.bs120_casovac)
					1 (S.L.bs120_stanicovani)
				{endif}
			{endif}
		{endif}
		
		(L.L.bs120_start) 1 =
		{if}
			0 (S.L.Linka_visible)
			"  " "@" $+ "  " $+ (S.$.BS120_Disp_B)
			(L.L.bs120_casovac) (L.S.Timegap) + (S.L.bs120_casovac)
			(L.L.bs120_casovac) 5 >=
			{if}
				0 (S.L.bs120_mod) (S.L.bs120_casovac) (S.L.bs120_start)
				"" $+ (S.$.BS120_Disp_B)	
			{endif}		
		{endif}
	{else}
		"" (S.$.BS120_Disp_A) (S.$.BS120_Disp_B) (S.$.pres_zastavky)
		-1 (S.L.bs120_mod)
		0 (S.L.bs120_casovac) (S.L.bs120_animace) (S.L.Linka_visible)
		1 (S.L.bs120_animace_vis)
	{endif}
'----------------------------
	
(L.L.mpc_linka) 900 >=
(L.L.mpc_linka) 740 = ||
(L.L.mpc_linka) 743 = ||

 {if}
 		(S.$.pres_zastavky_p_panel)
	
 {else}
		
	(L.L.mpc_linka) 1 >=
	{if}
	
	(L.L.pz_zmena_ok) 0 =
		{if}
		(L.L.pz_zmena) (L.S.Timegap) + (S.L.pz_zmena)
		
			(L.L.pz_zmena) 3 >
			{if}
			"" "Über:" $+ (S.$.pres_zastavky_p_panel)
			0 (S.L.pz_zmena)
				(L.L.IBIS_RouteIndex) (M.V.GetBusstopCount) 1 - (L.L.IBIS_busstop) 1 + >=
				{if}
					1 (S.L.pz_zmena_ok)
					(T.L.ev_BUSE_BOK_CHR)
				{else}
					0 (S.L.pz_zmena_ok)
				{endif}
			{endif}
		{endif}
		
		
	
		(L.L.pz_zmena_ok) 1 =
		{if}
		(L.L.pz_zmena) (L.S.Timegap) + (S.L.pz_zmena)
		
			(L.L.pz_zmena) 3 >
			{if}
			"" (L.$.IBIS_lcd_nextstop) (S.$.pres_zastavky_p_panel)
			0 (S.L.pz_zmena)
				(L.L.IBIS_RouteIndex) (M.V.GetBusstopCount) 1 - (L.L.IBIS_busstop) 1 + >=
				{if}
					2 (S.L.pz_zmena_ok)
					(T.L.ev_BUSE_BOK_CHR)
				{else}
					0 (S.L.pz_zmena_ok)
				{endif}
			{endif}
		{endif}
		
		(L.L.pz_zmena_ok) 2 =
		{if}
		(L.L.pz_zmena) (L.S.Timegap) + (S.L.pz_zmena)
		
			(L.L.pz_zmena) 3 >
			{if}
			"" (L.$.IBIS_lcd_stop1) (S.$.pres_zastavky_p_panel)
			0 (S.L.pz_zmena)
				(L.L.IBIS_RouteIndex) (M.V.GetBusstopCount) 1 - (L.L.IBIS_busstop) 2 + >=
				{if}
					3 (S.L.pz_zmena_ok)
					(T.L.ev_BUSE_BOK_CHR)
				{else}
					0 (S.L.pz_zmena_ok)
				{endif}
			{endif}
		{endif}
		
		(L.L.pz_zmena_ok) 3 =
		{if}
		(L.L.pz_zmena) (L.S.Timegap) + (S.L.pz_zmena)
		
			(L.L.pz_zmena) 3 >
			{if}
			"" (L.$.IBIS_lcd_stop2) (S.$.pres_zastavky_p_panel)
			0 (S.L.pz_zmena)			
				(L.L.IBIS_RouteIndex) (M.V.GetBusstopCount) 1 - (L.L.IBIS_busstop) 3 + >=
				{if}
					4 (S.L.pz_zmena_ok)
					(T.L.ev_BUSE_BOK_CHR)
				{else}
					0 (S.L.pz_zmena_ok)
				{endif}
			{endif}
		{endif}
		
		(L.L.pz_zmena_ok) 4 = 
		{if}
		(L.L.pz_zmena) (L.S.Timegap) + (S.L.pz_zmena)
		
			(L.L.pz_zmena) 3 >
			{if}
			"" (L.$.IBIS_lcd_stop3) (S.$.pres_zastavky_p_panel)
			0 (S.L.pz_zmena)
				(L.L.IBIS_RouteIndex) (M.V.GetBusstopCount) 1 - (L.L.IBIS_busstop) 4 + >=
				{if}
					5 (S.L.pz_zmena_ok)
					(T.L.ev_BUSE_BOK_CHR)
				{else}
					0 (S.L.pz_zmena_ok)
				{endif}
			{endif}
		{endif}
		
		(L.L.pz_zmena_ok) 5 =
		{if}
		(L.L.pz_zmena) (L.S.Timegap) + (S.L.pz_zmena)
		
			(L.L.pz_zmena) 3 >
			{if}
			"" (L.$.IBIS_lcd_stop4) (S.$.pres_zastavky_p_panel)
			0 (S.L.pz_zmena)
			0 (S.L.pz_zmena_ok)
			{endif}
		{endif}
		
	{else}
	
	"" (S.$.pres_zastavky_p_panel)
	{endif}
	{endif}
	
{endif}	
	(L.L.mpc_trasa) 0 =
		{if}
			"" (S.$.C_dozastavky) (S.$.C_zezastavky)
			{else}
			""
				(L.$.IBIS_terminus_name) $+ (S.$.C_dozastavky) $+
		
				(L.L.IBIS_busstop) 0 =
				{if}
				(L.$.IBIS_busstop_name) (S.$.C_zezastavky) 
				{endif}
		{endif}

	

{end}





{macro:IBIS_RefreshTerminusText}
	(L.L.IBIS_TerminusIndex) 5 (M.V.GetTerminusString) (S.$.IBIS_terminus_name)
	(L.L.IBIS_TerminusIndex) 0 (M.V.GetTerminusString) (S.$.IBIS_terminus_name2)

{end}

'Pokud bude ziel 910 tak se zobrazi new plocha

{macro:BUSE_BOK}
""

(L.L.mpc_linka) 900 >=
(L.L.mpc_linka) 740 = ||
(L.L.mpc_linka) 743 = ||

 {if}

  
'	Vnitřní panel  
		""
		"MJ                                                                " "@" $+
		" " $+
		(S.$.BS120_Disp_B)
		""
		"" $+ (S.$.BS120_Disp_A) (S.$.pres_zastavky)
	 {else}
	 
	 
 {endif}
 
	(L.L.elec_busbar_main_sw) !
	{if} 
	"" (S.$.JKZ_pasmo)
	{endif}
{end}

'Pořadí vozu na lince 


{macro:poradicis}

		""

		  
'		(L.L.mpc_trasa) "02" $IntToStrEnh $+ (S.$.poradi_cislo)
		
	(L.L.mpc_trasa) 
	{if}
	""
		(L.L.mpc_trasa) 9 >
		{if}
		(L.L.mpc_trasa) "02" $IntToStrEnh $+ (S.$.poradi_cislo)
		{else}
		(L.L.mpc_trasa) "01" $IntToStrEnh $+ (S.$.poradi_cislo)
		{endif}
	
	{else}
		""
		" " $+ (S.$.poradi_cislo)
	
	{endif}
	
	

	
{end}

{macro:rok_JR}
	""
	(L.S.Year) s1
	
	l1 2009 <
	{if}
	"Zeitplan:01.01.09" $+ (S.$.JR_verze)
	{endif}
	
	l1 2010 =
	{if}
	"Zeitplan:01.01.10" $+ (S.$.JR_verze)
	{endif}
	
	l1 2011 =
	{if}
	"Zeitplan:01.01.11" $+ (S.$.JR_verze)
	{endif}
	
	l1 2012 =
	{if}
	"Zeitplan:01.01.12" $+ (S.$.JR_verze)
	{endif}
	
	l1 2013 =
	{if}
	"Zeitplan:01.01.13" $+ (S.$.JR_verze)
	{endif}
	
	l1 2014 =
	{if}
	"Zeitplan:01.01.14" $+ (S.$.JR_verze)
	{endif}
	
	l1 2015 =
	{if}
	"Zeitplan:05.01.15" $+ (S.$.JR_verze)
	{endif}
	
	l1 2016 =
	{if}
	"Zeitplan:01.01.16" $+ (S.$.JR_verze)
	{endif}
	
	l1 2017 =
	{if}
	"Zeitplan:01.01.17" $+ (S.$.JR_verze)
	{endif}
{end}



